home *** CD-ROM | disk | FTP | other *** search
/ Clickx 23 / Clickx 23.iso / Menu.dcr / 00013_start menu.ls < prev    next >
Encoding:
Text File  |  2005-09-14  |  2.0 KB  |  64 lines
  1. global gPlatform, gGroep, gLinks
  2.  
  3. on enterFrame
  4.   if gPlatform = "PC" then
  5.     groepen = getGroupsPC()
  6.   else
  7.     groepen = getGroupsMAC()
  8.   end if
  9.   repeat with i = 1 to 11
  10.     if i <= groepen.count then
  11.       sprite(i + 4).pGroepID = groepen[i].id
  12.       sprite(i + 4).member = "menu_knop_N"
  13.       next repeat
  14.     end if
  15.     sprite(i + 4).pGroepID = 0
  16.     sprite(i + 4).member = "dummy"
  17.   end repeat
  18.   repeat with i = 1 to 11
  19.     if i <= groepen.count then
  20.       if groepen[i].Naamknop = "Backup24 DataProtector" then
  21.         sprite(i + 16).member.rtf = member("Backup24advertentie").rtf
  22.       else
  23.         sprite(i + 16).member.text = groepen[i].Naamknop
  24.         sprite(i + 16).member.font = member("menu_tekstKnopDefault").font
  25.         sprite(i + 16).member.fontSize = member("menu_tekstKnopDefault").fontSize
  26.         sprite(i + 16).member.fontStyle = member("menu_tekstKnopDefault").fontStyle
  27.       end if
  28.       next repeat
  29.     end if
  30.     sprite(i + 16).member.text = EMPTY
  31.   end repeat
  32.   if gPlatform = "PC" then
  33.     linkList = getLinksPC()
  34.   else
  35.     linkList = getLinksMAC()
  36.   end if
  37.   totWidth = 0
  38.   repeat with i = 1 to linkList.count
  39.     totWidth = totWidth + member(linkList[i].image).width
  40.   end repeat
  41.   totWidth = totWidth + ((linkList.count - 1) * 10)
  42.   pos = 421 - (totWidth / 2)
  43.   spriteNr = 32
  44.   repeat with i = 1 to linkList.count
  45.     pos = pos + (member(linkList[i].image).width / 2)
  46.     sprite(spriteNr).puppet = 1
  47.     if member(linkList[i].image).name <> EMPTY then
  48.       sprite(spriteNr).member = member(linkList[i].image)
  49.     else
  50.       sprite(spriteNr).member = member("missing")
  51.     end if
  52.     sprite(spriteNr).locH = pos
  53.     sprite(spriteNr).locV = 570
  54.     sprite(spriteNr).scriptInstanceList.add(new(script("knop_links")))
  55.     sprite(spriteNr).scriptInstanceList.add(new(script("cursor script")))
  56.     sprite(spriteNr).visible = 1
  57.     sprite(spriteNr).pLink = linkList[i].url
  58.     gLinks.add(spriteNr)
  59.     pos = pos + (member(linkList[i].image).width / 2)
  60.     pos = pos + 10
  61.     spriteNr = spriteNr + 1
  62.   end repeat
  63. end
  64.